home *** CD-ROM | disk | FTP | other *** search
/ PC Gamer (Italian) 48 / PC Gamer IT CD 48 2-2.iso / utility / nmail28u / DISK1 / _SETUP.1 / NETMAIL.EXE / 0 / RCDATA / TFOPENGROUP / TFOPENGROUP.txt
Encoding:
Text File  |  1999-09-10  |  1.6 KB  |  77 lines
  1. object FOpengroup: TFOpengroup
  2.   Left = 60
  3.   Top = 102
  4.   Width = 387
  5.   Height = 219
  6.   Caption = 'Find group '
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   OnClose = FormClose
  13.   OnShow = FormShow
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object SBGet: TSpeedButton
  17.     Left = 144
  18.     Top = 160
  19.     Width = 100
  20.     Height = 25
  21.     Caption = 'Get group'
  22.     Enabled = False
  23.     OnClick = SBGetClick
  24.   end
  25.   object SBCancel: TSpeedButton
  26.     Left = 266
  27.     Top = 160
  28.     Width = 100
  29.     Height = 25
  30.     Caption = 'Cancel'
  31.     OnClick = SBCancelClick
  32.   end
  33.   object SpeedButton1: TSpeedButton
  34.     Left = 16
  35.     Top = 160
  36.     Width = 100
  37.     Height = 25
  38.     Caption = 'All adress'
  39.     OnClick = SpeedButton1Click
  40.   end
  41.   object DBGrid1: TDBGrid
  42.     Left = 10
  43.     Top = 6
  44.     Width = 361
  45.     Height = 141
  46.     DataSource = DataSource1
  47.     TabOrder = 0
  48.     TitleFont.Charset = DEFAULT_CHARSET
  49.     TitleFont.Color = clWindowText
  50.     TitleFont.Height = -11
  51.     TitleFont.Name = 'MS Sans Serif'
  52.     TitleFont.Style = []
  53.     OnKeyDown = DBGrid1KeyDown
  54.   end
  55.   object Table1: TTable
  56.     DatabaseName = 'VistaMail'
  57.     TableName = 'GroupNam.db'
  58.     TableType = ttParadox
  59.     Left = 40
  60.     Top = 16
  61.     object Table1PosG: TAutoIncField
  62.       FieldName = 'PosG'
  63.       Visible = False
  64.     end
  65.     object Table1NameGroup: TStringField
  66.       DisplayLabel = 'Name  Group'
  67.       FieldName = 'NameGroup'
  68.       Size = 50
  69.     end
  70.   end
  71.   object DataSource1: TDataSource
  72.     DataSet = Table1
  73.     Left = 80
  74.     Top = 24
  75.   end
  76. end
  77.